home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
LOGIC Apps
/
Logic-APPLE_II_APPS.iso
/
pc
/
LOGIC Apple II 5.25" Library - DOS Part 2
/
DOS036.dsk
/
CALCULATOR START.int
< prev
next >
Wrap
Text File
|
2012-02-16
|
352b
|
11 lines
0 POKE 74,60: POKE 75,65
1 CALL -936
2 VTAB 5:PRINT "THE TALKING CALCULATOR BY ROGER KEATING"
3 IF PEEK (761)=201 THEN 4: POKE 761,201:PRINT :PRINT "PLEASE TYPE 'RUN (RETURN)'":PRINT :END
4 CALL -384:VTAB 10:TAB 10
5 PRINT " LOADING DATA NOW ":CALL -380
10 D$="<CTRL-D>"
20 PRINT D$;"BLOAD NUMBERS"
30 PRINT D$;"BLOAD TALK"
40 PRINT D$;"RUN CALC1"